home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 2 / LSD and 17bit Compendium Deluxe - Volume II.iso / a / prog / asmsrc / phagexsources.lha / source / TrackMouse.s < prev   
Encoding:
Text File  |  1993-08-21  |  368 b   |  27 lines
  1. TrackMouse    Lea    $Dff000,a6
  2.     Move.w    Joy0Dat(a6),d0
  3.     Lea    OldX(pc),a0
  4.     Lea    XPos(pc),a1
  5.     Move.b    0(a0),d1
  6.     Move.b    d0,0(a0)
  7.     Sub.b    d0,d1
  8.     Ext.w    d1
  9.     Sub.w    d1,0(a1)
  10.     
  11.     Lsr.w    #8,d0
  12.     Move.b    2(a0),d1
  13.     Move.b    d0,2(a0)
  14.     Sub.b    d0,d1
  15.     Ext.w    d1
  16.     Sub.w    d1,2(a1)
  17.     Rts
  18.     
  19. SetMouse    Lea    $Dff000,a6
  20.     Move.w    Joy0Dat(a6),d0
  21.     Lea    OldX(pc),a0
  22.     Move.b    d0,0(a0)
  23.     Lsr.w    #8,d0
  24.     Move.b    d0,2(a0)
  25.     Rts
  26.  
  27.